home *** CD-ROM | disk | FTP | other *** search
/ SGI Hot Mix 17 / Hot Mix 17.iso / HM17_SGI / research / lib / insget.pro < prev    next >
Text File  |  1997-07-08  |  1KB  |  40 lines
  1. ; $Id: insget.pro,v 1.2 1997/01/15 03:11:50 ali Exp $
  2. ;
  3. ; Copyright (c) 1996-1997, Research Systems, Inc.  All rights reserved.
  4. ;       Unauthorized reproduction prohibited.
  5. ;
  6. ;+
  7. ; NAME:
  8. ;       INSGET
  9. ;
  10. ; PURPOSE:
  11. ;       Stub for INSGET.  Displays message saying that insight must be running.
  12. ;        Once Insight is restored and running this routine will be replaced by
  13. ;        the actual compiled version in the insight save file.
  14. ;
  15. ; CALLING SEQUENCE:
  16. ;       INSGET
  17. ;
  18. ; DEVELOPMENT NOTES:
  19. ;        - 
  20. ;
  21. ;------------------------------------------------------------------------------
  22. function InsGet, $
  23.     arg1,  arg2,  arg3,  $
  24.     arg4,  arg5,  arg6,  $
  25.     arg7,  arg8,  arg9,  $
  26.     arg10, arg11, arg12, $
  27.     arg13, arg14, arg15, $
  28.     arg16, arg17, arg18, $
  29.     arg19, arg20, arg21, $
  30.     arg22, arg23, arg24, $
  31.     arg25, _EXTRA=extra
  32.  
  33.     ; Notify user that Insight must be running to use this function
  34.     ;
  35.     result = DIALOG_MESSAGE($
  36.         ['Insight must be running in order to use InsGet.', $
  37.           'Please start Insight and try again.'] )
  38.     return, 0
  39. end
  40.